home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
LOGIC Apps
/
Logic-APPLE_II_APPS.iso
/
mac
/
LOGIC Apple II 5.25" Library - ProDOS
/
PRO027A.dsk
/
SQUIRT.asm
< prev
next >
Wrap
Assembly Source File
|
2012-02-16
|
16KB
|
699 lines
2000- 4C 13 20 JMP $2013
2003- 0D 53 51 ORA $5153
2006- 55 49 EOR $49,X
2008- 52 ???
2009- 54 ???
200A- 2E 53 59 ROL $5953
200D- 53 ???
200E- 54 ???
200F- 45 4D EOR $4D
2011- 00 BRK
2012- 00 BRK
2013- A2 FF LDX #$FF
2015- 9A TXS
2016- AD F3 03 LDA $03F3
2019- 49 A5 EOR #$A5
201B- 8D F4 03 STA $03F4
201E- A0 00 LDY #$00
2020- B9 00 20 LDA $2000,Y
2023- 99 00 1E STA $1E00,Y
2026- B9 00 21 LDA $2100,Y
2029- 99 00 1F STA $1F00,Y
202C- 88 DEY
202D- D0 F1 BNE $2020
202F- 4C 32 1E JMP $1E32
2032- AD 83 C0 LDA $C083
2035- AD 83 C0 LDA $C083
2038- A2 03 LDX #$03
203A- A9 00 LDA #$00
203C- 85 06 STA $06
203E- 85 08 STA $08
2040- A9 22 LDA #$22
2042- 85 09 STA $09
2044- A9 D1 LDA #$D1
2046- 85 07 STA $07
2048- A0 00 LDY #$00
204A- B1 08 LDA ($08),Y
204C- 91 06 STA ($06),Y
204E- 88 DEY
204F- D0 F9 BNE $204A
2051- E6 07 INC $07
2053- E6 09 INC $09
2055- CA DEX
2056- 10 F2 BPL $204A
2058- AD 82 C0 LDA $C082
205B- AE 72 1F LDX $1F72
205E- BD 72 1F LDA $1F72,X
2061- 9D 4F 06 STA $064F,X
2064- CA DEX
2065- D0 F7 BNE $205E
2067- CE F4 03 DEC $03F4
206A- A9 00 LDA #$00
206C- 85 08 STA $08
206E- AD 30 BF LDA $BF30
2071- 8D 40 1F STA $1F40
2074- 24 08 BIT $08
2076- 70 6B BVS $20E3
2078- 20 00 BF JSR $BF00
207B- 80 ???
207C- 3F ???
207D- 1F ???
207E- D0 63 BNE $20E3
2080- A9 00 LDA #$00
2082- 85 06 STA $06
2084- A9 20 LDA #$20
2086- 85 07 STA $07
2088- A0 02 LDY #$02
208A- B1 06 LDA ($06),Y
208C- 8D 43 1F STA $1F43
208F- D0 06 BNE $2097
2091- A5 08 LDA $08
2093- 09 40 ORA #$40
2095- 85 08 STA $08
2097- C8 INY
2098- B1 06 LDA ($06),Y
209A- 8D 44 1F STA $1F44
209D- A9 04 LDA #$04
209F- 85 06 STA $06
20A1- A2 0D LDX #$0D
20A3- 86 09 STX $09
20A5- A0 10 LDY #$10
20A7- B1 06 LDA ($06),Y
20A9- C9 FF CMP #$FF
20AB- D0 22 BNE $20CF
20AD- A0 00 LDY #$00
20AF- B1 06 LDA ($06),Y
20B1- F0 1C BEQ $20CF
20B3- 29 0F AND #$0F
20B5- A8 TAY
20B6- 24 08 BIT $08
20B8- 30 2F BMI $20E9
20BA- CC 03 1E CPY $1E03
20BD- D0 10 BNE $20CF
20BF- B1 06 LDA ($06),Y
20C1- D9 03 1E CMP $1E03,Y
20C4- D0 09 BNE $20CF
20C6- 88 DEY
20C7- D0 F6 BNE $20BF
20C9- A5 08 LDA $08
20CB- 09 80 ORA #$80
20CD- 85 08 STA $08
20CF- A5 06 LDA $06
20D1- 18 CLC
20D2- 69 27 ADC #$27
20D4- 85 06 STA $06
20D6- A5 07 LDA $07
20D8- 69 00 ADC #$00
20DA- 85 07 STA $07
20DC- A6 09 LDX $09
20DE- CA DEX
20DF- 30 93 BMI $2074
20E1- 10 C0 BPL $20A3
20E3- 20 00 BF JSR $BF00
20E6- 65 38 ADC $38
20E8- 1F ???
20E9- AE 6A 1F LDX $1F6A
20EC- 8C 4B 1F STY $1F4B
20EF- B1 06 LDA ($06),Y
20F1- CA DEX
20F2- 30 05 BMI $20F9
20F4- DD 6B 1F CMP $1F6B,X
20F7- D0 D6 BNE $20CF
20F9- 99 4B 1F STA $1F4B,Y
20FC- 88 DEY
20FD- D0 F0 BNE $20EF
20FF- 20 00 BF JSR $BF00
2102- C8 INY
2103- 45 1F EOR $1F
2105- D0 DC BNE $20E3
2107- AD 4A 1F LDA $1F4A
210A- 8D 66 1F STA $1F66
210D- 8D 5E 1F STA $1F5E
2110- 8D 5C 1F STA $1F5C
2113- 20 00 BF JSR $BF00
2116- D1 65 CMP ($65),Y
2118- 1F ???
2119- D0 C8 BNE $20E3
211B- AD 67 1F LDA $1F67
211E- 8D 61 1F STA $1F61
2121- AD 68 1F LDA $1F68
2124- 8D 62 1F STA $1F62
2127- 20 00 BF JSR $BF00
212A- CA DEX
212B- 5D 1F D0 EOR $D01F,X
212E- B4 20 LDY $20,X
2130- 00 BRK
2131- BF ???
2132- CC 5B 1F CPY $1F5B
2135- 4C 00 20 JMP $2000
2138- 04 ???
2139- 00 BRK
213A- 00 BRK
213B- 00 BRK
213C- 00 BRK
213D- 00 BRK
213E- 00 BRK
213F- 03 ???
2140- 00 BRK
2141- 00 BRK
2142- 20 02 00 JSR $0002
2145- 03 ???
2146- 4B ???
2147- 1F ???
2148- 00 BRK
2149- 08 PHP
214A- 00 BRK
214B- 00 BRK
214C- 00 BRK
214D- 00 BRK
214E- 00 BRK
214F- 00 BRK
2150- 00 BRK
2151- 00 BRK
2152- 00 BRK
2153- 00 BRK
2154- 00 BRK
2155- 00 BRK
2156- 00 BRK
2157- 00 BRK
2158- 00 BRK
2159- 00 BRK
215A- 00 BRK
215B- 01 00 ORA ($00,X)
215D- 04 ???
215E- 00 BRK
215F- 00 BRK
2160- 20 00 00 JSR $0000
2163- 00 BRK
2164- 00 BRK
2165- 02 ???
2166- 00 BRK
2167- 00 BRK
2168- 00 BRK
2169- 00 BRK
216A- 07 ???
216B- 2E 53 59 ROL $5953
216E- 53 ???
216F- 54 ???
2170- 45 4D EOR $4D
2172- 28 PLP
2173- D3 ???
2174- D1 D5 CMP ($D5),Y
2176- C9 D2 CMP #$D2
2178- D4 ???
2179- A0 C3 LDY #$C3
217B- EF ???
217C- F0 F2 BEQ $2170
217E- AE A0 B1 LDX $B1A0
2181- B9 B8 B5 LDA $B5B8,Y
2184- AD B8 B6 LDA $B6B8
2187- A0 E2 LDY #$E2
2189- F9 A0 D3 SBC $D3A0,Y
218C- F9 EE E5 SBC $E5EE,Y
218F- F3 ???
2190- E9 F3 SBC #$F3
2192- A0 D3 LDY #$D3
2194- F9 F3 F4 SBC $F4F3,Y
2197- E5 ED SBC $ED
2199- F3 ???
219A- A0 EA LDY #$EA
219C- EA NOP
219D- EA NOP
219E- EA NOP
219F- EA NOP
21A0- EA NOP
21A1- EA NOP
21A2- EA NOP
21A3- EA NOP
21A4- EA NOP
21A5- EA NOP
21A6- EA NOP
21A7- EA NOP
21A8- EA NOP
21A9- EA NOP
21AA- EA NOP
21AB- EA NOP
21AC- EA NOP
21AD- EA NOP
21AE- EA NOP
21AF- EA NOP
21B0- EA NOP
21B1- EA NOP
21B2- EA NOP
21B3- EA NOP
21B4- EA NOP
21B5- EA NOP
21B6- EA NOP
21B7- EA NOP
21B8- EA NOP
21B9- EA NOP
21BA- EA NOP
21BB- EA NOP
21BC- EA NOP
21BD- EA NOP
21BE- EA NOP
21BF- EA NOP
21C0- EA NOP
21C1- EA NOP
21C2- EA NOP
21C3- EA NOP
21C4- EA NOP
21C5- EA NOP
21C6- EA NOP
21C7- EA NOP
21C8- EA NOP
21C9- EA NOP
21CA- EA NOP
21CB- EA NOP
21CC- EA NOP
21CD- EA NOP
21CE- EA NOP
21CF- EA NOP
21D0- EA NOP
21D1- EA NOP
21D2- EA NOP
21D3- EA NOP
21D4- EA NOP
21D5- EA NOP
21D6- EA NOP
21D7- EA NOP
21D8- EA NOP
21D9- EA NOP
21DA- EA NOP
21DB- EA NOP
21DC- EA NOP
21DD- EA NOP
21DE- EA NOP
21DF- EA NOP
21E0- EA NOP
21E1- EA NOP
21E2- EA NOP
21E3- EA NOP
21E4- EA NOP
21E5- EA NOP
21E6- EA NOP
21E7- EA NOP
21E8- EA NOP
21E9- EA NOP
21EA- EA NOP
21EB- EA NOP
21EC- EA NOP
21ED- EA NOP
21EE- EA NOP
21EF- EA NOP
21F0- EA NOP
21F1- EA NOP
21F2- EA NOP
21F3- EA NOP
21F4- EA NOP
21F5- EA NOP
21F6- EA NOP
21F7- EA NOP
21F8- EA NOP
21F9- EA NOP
21FA- EA NOP
21FB- EA NOP
21FC- EA NOP
21FD- EA NOP
21FE- EA NOP
21FF- EA NOP
2200- AD 82 C0 LDA $C082
2203- 20 2F FB JSR $FB2F
2206- A9 00 LDA #$00
2208- 85 1A STA $1A
220A- A2 17 LDX #$17
220C- 9D 58 BF STA $BF58,X
220F- CA DEX
2210- 10 FA BPL $220C
2212- EE 6F BF INC $BF6F
2215- A2 CF LDX #$CF
2217- 8E 58 BF STX $BF58
221A- AD 98 BF LDA $BF98
221D- A8 TAY
221E- 29 02 AND #$02
2220- D0 0E BNE $2230
2222- CA DEX
2223- 8E C0 11 STX $11C0
2226- 98 TYA
2227- 30 0A BMI $2233
2229- A9 DF LDA #$DF
222B- 8D 3C 12 STA $123C
222E- D0 03 BNE $2233
2230- 20 00 C3 JSR $C300
2233- 20 11 12 JSR $1211
2236- A2 08 LDX #$08
2238- 20 2A 12 JSR $122A
223B- 20 49 12 JSR $1249
223E- A9 10 LDA #$10
2240- 85 19 STA $19
2242- 20 00 BF JSR $BF00
2245- C5 F0 CMP $F0
2247- 12 ???
2248- D0 1D BNE $2267
224A- 20 1E 12 JSR $121E
224D- 20 AF 11 JSR $11AF
2250- 8A TXA
2251- D0 FA BNE $224D
2253- A0 10 LDY #$10
2255- 91 08 STA ($08),Y
2257- 4C F7 10 JMP $10F7
225A- 20 11 12 JSR $1211
225D- A5 1A LDA $1A
225F- F0 D5 BEQ $2236
2261- 20 00 BF JSR $BF00
2264- C6 F6 DEC $F6
2266- 12 ???
2267- D0 1B BNE $2284
2269- A2 3C LDX #$3C
226B- 20 2A 12 JSR $122A
226E- A2 00 LDX #$00
2270- BD 81 02 LDA $0281,X
2273- 20 35 12 JSR $1235
2276- E8 INX
2277- E4 1A CPX $1A
2279- 90 F5 BCC $2270
227B- 20 1E 12 JSR $121E
227E- 20 00 BF JSR $BF00
2281- C8 INY
2282- F9 12 D0 SBC $D012,Y
2285- 63 ???
2286- 20 00 BF JSR $BF00
2289- CC F4 12 CPY $12F4
228C- 20 49 12 JSR $1249
228F- 20 55 12 JSR $1255
2292- 84 62 STY $62
2294- 84 72 STY $72
2296- A0 02 LDY #$02
2298- 84 80 STY $80
229A- B1 06 LDA ($06),Y
229C- 85 64 STA $64
229E- C8 INY
229F- 84 60 STY $60
22A1- B1 06 LDA ($06),Y
22A3- 85 65 STA $65
22A5- C8 INY
22A6- 84 70 STY $70
22A8- 84 06 STY $06
22AA- A0 20 LDY #$20
22AC- 84 63 STY $63
22AE- 84 73 STY $73
22B0- A9 0D LDA #$0D
22B2- 85 18 STA $18
22B4- A9 27 LDA #$27
22B6- 85 19 STA $19
22B8- A0 10 LDY #$10
22BA- B1 06 LDA ($06),Y
22BC- C9 FF CMP #$FF
22BE- F0 04 BEQ $22C4
22C0- C9 0F CMP #$0F
22C2- D0 08 BNE $22CC
22C4- 20 AF 11 JSR $11AF
22C7- 8A TXA
22C8- F0 05 BEQ $22CF
22CA- D0 08 BNE $22D4
22CC- 20 6A 12 JSR $126A
22CF- 98 TYA
22D0- A0 10 LDY #$10
22D2- 91 08 STA ($08),Y
22D4- C6 18 DEC $18
22D6- 10 E0 BPL $22B8
22D8- A5 64 LDA $64
22DA- F0 10 BEQ $22EC
22DC- AD 30 BF LDA $BF30
22DF- 85 61 STA $61
22E1- 20 00 BF JSR $BF00
22E4- 80 ???
22E5- 60 RTS
22E6- 00 BRK
22E7- F0 A6 BEQ $228F
22E9- 4C 93 11 JMP $1193
22EC- A5 1D LDA $1D
22EE- C9 C1 CMP #$C1
22F0- D0 05 BNE $22F7
22F2- A2 10 LDX #$10
22F4- 20 2A 12 JSR $122A
22F7- A2 17 LDX #$17
22F9- 20 25 12 JSR $1225
22FC- 20 40 12 JSR $1240
22FF- C9 9B CMP #$9B
2301- F0 1B BEQ $231E
2303- 29 DF AND #$DF
2305- 85 1E STA $1E
2307- 20 49 12 JSR $1249
230A- A0 10 LDY #$10
230C- B1 08 LDA ($08),Y
230E- D0 05 BNE $2315
2310- 20 DD FB JSR $FBDD
2313- F0 E7 BEQ $22FC
2315- C5 1E CMP $1E
2317- F0 19 BEQ $2332
2319- 20 5F 12 JSR $125F
231C- F0 EC BEQ $230A
231E- A6 1A LDX $1A
2320- F0 08 BEQ $232A
2322- BD 80 02 LDA $0280,X
2325- CA DEX
2326- C9 2F CMP #$2F
2328- D0 F8 BNE $2322
232A- 86 1A STX $1A
232C- 8E 80 02 STX $0280
232F- 4C 5A 10 JMP $105A
2332- A0 00 LDY #$00
2334- B1 08 LDA ($08),Y
2336- 85 1C STA $1C
2338- 29 0F AND #$0F
233A- 85 1B STA $1B
233C- 8D FF 12 STA $12FF
233F- A6 1A LDX $1A
2341- A9 2F LDA #$2F
2343- 9D 81 02 STA $0281,X
2346- E8 INX
2347- C6 1B DEC $1B
2349- 30 0A BMI $2355
234B- C8 INY
234C- B1 08 LDA ($08),Y
234E- 29 7F AND #$7F
2350- 99 FF 12 STA $12FF,Y
2353- D0 EE BNE $2343
2355- A5 1A LDA $1A
2357- F0 D1 BEQ $232A
2359- A5 1C LDA $1C
235B- 30 CD BMI $232A
235D- 8E 80 02 STX $0280
2360- 20 00 BF JSR $BF00
2363- C8 INY
2364- EA NOP
2365- 12 ???
2366- D0 2B BNE $2393
2368- AD EF 12 LDA $12EF
236B- 85 81 STA $81
236D- 85 71 STA $71
236F- 20 00 BF JSR $BF00
2372- D1 80 CMP ($80),Y
2374- 00 BRK
2375- A5 82 LDA $82
2377- 85 74 STA $74
2379- A5 83 LDA $83
237B- 85 75 STA $75
237D- 20 00 BF JSR $BF00
2380- CA DEX
2381- 70 00 BVS $2383
2383- D0 0E BNE $2393
2385- 20 00 BF JSR $BF00
2388- CC F4 12 CPY $12F4
238B- A9 95 LDA #$95
238D- 20 35 12 JSR $1235
2390- 4C 00 20 JMP $2000
2393- 48 PHA
2394- 20 11 12 JSR $1211
2397- 68 PLA
2398- 29 B0 AND #$B0
239A- D0 03 BNE $239F
239C- A2 5D LDX #$5D
239E- 2C A2 54 BIT $54A2
23A1- 20 25 12 JSR $1225
23A4- A2 65 LDX #$65
23A6- 20 2A 12 JSR $122A
23A9- 20 40 12 JSR $1240
23AC- 4C 00 10 JMP $1000
23AF- A0 00 LDY #$00
23B1- B1 06 LDA ($06),Y
23B3- AA TAX
23B4- 29 0F AND #$0F
23B6- 85 1B STA $1B
23B8- D0 03 BNE $23BD
23BA- 4C 6A 12 JMP $126A
23BD- A5 1D LDA $1D
23BF- C9 DB CMP #$DB
23C1- B0 F7 BCS $23BA
23C3- E6 1D INC $1D
23C5- C9 CE CMP #$CE
23C7- F0 04 BEQ $23CD
23C9- B0 07 BCS $23D2
23CB- 90 09 BCC $23D6
23CD- 48 PHA
23CE- 20 1E 12 JSR $121E
23D1- 68 PLA
23D2- A0 27 LDY #$27
23D4- 84 24 STY $24
23D6- A0 10 LDY #$10
23D8- 91 08 STA ($08),Y
23DA- 20 35 12 JSR $1235
23DD- A9 AD LDA #$AD
23DF- 20 35 12 JSR $1235
23E2- 8A TXA
23E3- A0 00 LDY #$00
23E5- 91 08 STA ($08),Y
23E7- C6 1B DEC $1B
23E9- 30 08 BMI $23F3
23EB- C8 INY
23EC- B1 06 LDA ($06),Y
23EE- 20 35 12 JSR $1235
23F1- D0 F2 BNE $23E5
23F3- A9 A0 LDA #$A0
23F5- 20 35 12 JSR $1235
23F8- C8 INY
23F9- C0 11 CPY #$11
23FB- 90 F6 BCC $23F3
23FD- A5 1A LDA $1A
23FF- F0 0B BEQ $240C
2401- 8A TXA
2402- 30 03 BMI $2407
2404- A2 42 LDX #$42
2406- 2C A2 48 BIT $48A2
2409- 20 2A 12 JSR $122A
240C- 20 5F 12 JSR $125F
240F- F0 11 BEQ $2422
2411- A9 8C LDA #$8C
2413- 20 3D 12 JSR $123D
2416- 20 58 FC JSR $FC58
2419- A2 00 LDX #$00
241B- 4C 2A 12 JMP $122A
241E- A9 04 LDA #$04
2420- 85 25 STA $25
2422- 4C 8E FD JMP $FD8E
2425- A9 14 LDA #$14
2427- 20 20 12 JSR $1220
242A- BD 78 12 LDA $1278,X
242D- 10 06 BPL $2435
242F- 20 35 12 JSR $1235
2432- E8 INX
2433- D0 F5 BNE $242A
2435- 09 80 ORA #$80
2437- C9 E0 CMP #$E0
2439- 90 02 BCC $243D
243B- 29 FF AND #$FF
243D- 4C ED FD JMP $FDED
2440- AD 00 C0 LDA $C000
2443- 10 FB BPL $2440
2445- 8D 10 C0 STA $C010
2448- 60 RTS
2449- A9 00 LDA #$00
244B- 85 08 STA $08
244D- A9 30 LDA #$30
244F- 85 09 STA $09
2451- A9 C1 LDA #$C1
2453- 85 1D STA $1D
2455- A9 20 LDA #$20
2457- 85 07 STA $07
2459- A9 00 LDA #$00
245B- 85 06 STA $06
245D- A8 TAY
245E- 60 RTS
245F- 18 CLC
2460- A5 08 LDA $08
2462- 69 20 ADC #$20
2464- 85 08 STA $08
2466- 90 02 BCC $246A
2468- E6 09 INC $09
246A- 18 CLC
246B- A5 19 LDA $19
246D- 65 06 ADC $06
246F- 85 06 STA $06
2471- 90 02 BCC $2475
2473- E6 07 INC $07
2475- A0 00 LDY #$00
2477- 60 RTS
2478- D3 ???
2479- D1 D5 CMP ($D5),Y
247B- C9 D2 CMP #$D2
247D- D4 ???
247E- 8D 0D D6 STA $D60D
2481- EF ???
2482- EC F5 ED CPX $EDF5
2485- E5 F3 SBC $F3
2487- 3A ???
2488- BC CE EF LDY $EFCE,X
248B- EE E5 BE INC $BEE5
248E- 0D 8D D0 ORA $D08D
2491- F2 ???
2492- E5 F3 SBC $F3
2494- F3 ???
2495- A0 E1 LDY #$E1
2497- A0 EC LDY #$EC
2499- E5 F4 SBC $F4
249B- F4 ???
249C- E5 F2 SBC $F2
249E- A0 EF LDY #$EF
24A0- F2 ???
24A1- A0 BC LDY #$BC
24A3- C5 D3 CMP $D3
24A5- C3 ???
24A6- BE A0 F4 LDX $F4A0,Y
24A9- EF ???
24AA- A0 F0 LDY #$F0
24AC- F2 ???
24AD- E5 F6 SBC $F6
24AF- E9 EF SBC #$EF
24B1- F5 F3 SBC $F3,X
24B3- 0D D0 E1 ORA $E1D0
24B6- F4 ???
24B7- E8 INX
24B8- BA TSX
24B9- 20 D3 F9 JSR $F9D3
24BC- F3 ???
24BD- F4 ???
24BE- E5 6D SBC $6D
24C0- D3 ???
24C1- F5 E2 SBC $E2,X
24C3- E4 E9 CPX $E9
24C5- F2 ???
24C6- E5 E3 SBC $E3
24C8- F4 ???
24C9- EF ???
24CA- F2 ???
24CB- 79 C9 AF ADC $AFC9,Y
24CE- CF ???
24CF- A0 C5 LDY #$C5
24D1- F2 ???
24D2- F2 ???
24D3- EF ???
24D4- 72 ???
24D5- C2 ???
24D6- E1 E4 SBC ($E4,X)
24D8- A0 D0 LDY #$D0
24DA- E1 F4 SBC ($F4,X)
24DC- 68 PLA
24DD- 8D D0 F2 STA $F2D0
24E0- E5 F3 SBC $F3
24E2- F3 ???
24E3- A0 E1 LDY #$E1
24E5- A0 EB LDY #$EB
24E7- E5 F9 SBC $F9
24E9- 0D 03 FF ORA $FF03
24EC- 12 ???
24ED- 00 BRK
24EE- 08 PHP
24EF- 12 ???
24F0- 02 ???
24F1- 00 BRK
24F2- 00 BRK
24F3- 20 01 00 JSR $0001
24F6- 01 80 ORA ($80,X)
24F8- 02 ???
24F9- 03 ???
24FA- 80 ???
24FB- 02 ???
24FC- 00 BRK
24FD- 20 00 00 JSR $0000